*0200
MAIN, CLA CLL
JMP SUB
*0377
SUB, TAD I A
HLT 
*0014
A, 447
B, 2
C, 3
*0450
D, 4
$MAIN